home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1996 June
/
EnigmA AMIGA RUN 08 (1996)(G.R. Edizioni)(IT)[!][issue 1996-06][EARSAN CD VII].iso
/
earcd
/
comm1
/
aptbbs1.lha
/
APTBBS1
/
APT
/
Batch
/
Mail.Batch.traptoss
< prev
next >
Wrap
Text File
|
1995-10-10
|
1KB
|
43 lines
; This script unpacks and tosses mail and packs outgoing mail
; First, I lower my task priority so I do not slow down anything else
changetaskpri -1
; Second, I make a safety backup copy of the inbound mail bundles
copy mail:inbound/????????.((mo|tu|we|th|fr|sa|su)(0|1|2|3|4|5|6|7|8|9)|pkt) mail:bak clone
; Then I call TrapToss to toss and scan mail. The NOSCANOUTBOUND and
; NOROUTING keywords tell TrapToss that it should not mess with .FLO files
; in the outbound directory at this time nor should it archive anything
; yet. This is important because TrapDoor could just be trying to send an
; archive and the two programs might conflict.
failat 21
TrapToss toss scan noscanoutbound norouting
; So before I start changing archives in the outbound directory, I turn
; off TrapDoor (i.e. I disable inbound calls)
;failat 101
;TrapTell "rings 99"
;TrapTell "rings 99"
;failat 21
; Now I can pack the mail
TrapToss scanoutbound routing
; Finally, I re-enable TrapDoor
;failat 101
;TrapTell "rings 1"
;TrapTell "rings 1"
;failat 21
ApT:ApTmail
rx ApT:rexx/ImportTics.rexx
; set task priority back to normal
changetaskpri 0